(eshell-extended-glob): Expand the "." path before passing it down to

`eshell-glob-entries'.  This is done because special file-handlers
will on trigger on ".", even if `default-directory' is special.

diff --git a/lisp/eshell/em-glob.el b/lisp/eshell/em-glob.el
index 869144dad7446098f890bf36c9d39b231814c334..ec7ed22876a1eb9dad83813e656d25dc7bbab252 100644 (file)
--- a/lisp/eshell/em-glob.el
+++ b/lisp/eshell/em-glob.el
@@ -254,7 +254,8 @@ the form:
                 (file-name-absolute-p (car paths)))
            (eshell-glob-entries (file-name-as-directory (car paths))
                                 (cdr paths))
-         (eshell-glob-entries (file-name-as-directory ".") paths))
+         (eshell-glob-entries (expand-file-name
+                               (file-name-as-directory ".")) paths))
       (if message-shown
          (message nil)))
     (or (and matches (nreverse matches))